home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -in_the_mag- / reader_requests / gmplaygui / gui / info.sel < prev    next >
Text File  |  1997-06-14  |  641b  |  28 lines
  1.  
  2. defenv gmii ""
  3.  
  4. font [bpfont]
  5. y [bpiy]
  6. x [bpix]
  7. size 36
  8. title "GMPlayGUI 1.5"
  9. background [bpbackground]
  10.  
  11. onchange gmpid to *none* exit
  12. onchange gmm dumpx bpix dumpy bpiy update
  13.  
  14. [gmii] text "Current midi file:"
  15. color dark light
  16. text "[short]"
  17. color dark
  18. [gmii] text "[shortinfo]"
  19. [gmii] color light [bpbuttons]
  20. [gmii] button "Move this file" 'execute move'
  21. [gmii] color dark [bpbuttons]
  22. [gmii] button 'Midi-Info' 'copy "$gm" to t:file.mid' '$gmunp t:file.mid' 'run >nil: /midiinfo >CON:0/11/600/240/GMPlay_GUI/close/wait t:file.mid' 'delete t:file.mid'
  23.  
  24.  
  25. onexit 'setenv gmi " "' 'setenv gmm `eval $gmm+1`' dumpx bpix dumpy bpiy exit
  26.  
  27. gap 1
  28.